home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1995 November
/
EnigmA AMIGA RUN 02 (1995)(G.R. Edizioni)(IT)[!][issue 1995-11][Skylink CD].iso
/
earcd
/
ear
/
mui23dev.lha
/
MUI
/
Developer
/
Modula
/
txt
/
MuiD.def
< prev
next >
Wrap
Text File
|
1994-12-23
|
55KB
|
1,191 lines
DEFINITION MODULE MuiD;
(*$ NilChk := FALSE *)
(*$ EntryClear := FALSE *)
(*$ LargeVars := FALSE *)
(*$ StackParms := FALSE *)
(***************************************************************************
**
** MUI - MagicUserInterface
** (c) 1993/94 by Stefan Stuntz
**
** Main Header File
**
** Modula-Interface done by Christian "Kochtopf" Scholz '93/94 (Freeware)
**
** New Version 23.6.1994 for MUI 2.1
**
** If you got problems with this, please contact
**
** ruebe@pool.informatik.rwth-aachen.de
**
****************************************************************************
** General Header File Information
****************************************************************************
**
** All macro and structure definitions follow these rules:
**
** Name Meaning
**
** mc<class> Name of a class
** mm<class><method> Method
** mv<class><method><x> Special method value
** ma<class><attrib> Attribute
** mv<class><attrib><x> Special attribute value
** me<error> Error return code from MUIError()
** mi<name> Standard MUI image
** mo<name> Object type for MUI_MakeObject()
**
** ma... attribute definitions are followed by a comment
** consisting of the three possible letters I, S and G.
** I: it's possible to specify this attribute at object creation time.
** S: it's possible to change this attribute with SetAttrs().
** G: it's possible to get this attribute with GetAttr().
*)
IMPORT UD: UtilityD;
IMPORT S: SYSTEM;
(***************************************************************************
** Object Types for MUI_MakeObject()
***************************************************************************)
CONST moLabel =1; (* STRPTR label, ULONG flags *)
CONST moButton =2; (* STRPTR label *)
CONST moCheckmark =3; (* STRPTR label *)
CONST moCycle =4; (* STRPTR label, STRPTR *entries *)
CONST moRadio =5; (* STRPTR label, STRPTR *entries *)
CONST moSlider =6; (* STRPTR label, LONG min, LONG max *)
CONST moString =7; (* STRPTR label, LONG maxlen *)
CONST moPopButton =8; (* STRPTR imagespec *)
CONST moHSpace =9; (* LONG space *)
CONST moVSpace =10; (* LONG space *)
CONST moHBar =11; (* LONG space *)
CONST moVBar =12; (* LONG space *)
CONST moMenustripNM =13; (* struct NewMenu *nm, ULONG flags *)
CONST moMenuitem =14; (* STRPTR label, STRPTR shortcut, ULONG flags, ULONG data *)
CONST moBarTitle =15; (* STRPTR label *)
CONST moLabel_SingleFrame = 80H;
CONST moLabel_DoubleFrame = 100H;
CONST moLabel_LeftAligned = 200H;
CONST moLabel_Centered = 400H;
(***************************************************************************
** ARexx Interface
***************************************************************************)
TYPE
MUICommand = RECORD
mcName : S.ADDRESS;
mcTemplate : S.ADDRESS;
mcParameters: LONGINT;
mcHook : UD.HookPtr;
mcReserved : ARRAY[0..5] OF LONGINT;
END;
CONST MUI_RXERR_BADDEFINITION =-1;
CONST MUI_RXERR_OUTOFMEMORY =-2;
CONST MUI_RXERR_UNKNOWNCOMMAND =-3;
CONST MUI_RXERR_BADSYNTAX =-4;
(***************************************************************************
** Parameter structure for some Classes
***************************************************************************)
TYPE
mPaletteEntry = RECORD
mpe_ID : LONGINT;
mpe_Red : LONGCARD;
mpe_Green : LONGCARD;
mpe_Blue : LONGCARD;
mpe_Group : LONGINT;
END;
mScrmodelistEntry = RECORD
sme_Name : S.ADDRESS; (* string *)
sme_ModeID : LONGCARD;
END;
CONST mvPaletteEntryEnd = -1;
(***************************************************************************
** Return values for MUIError()
***************************************************************************)
CONST
meOK =0;
meOutOfMemory =1;
meOutOfGfxMemory =2;
meInvalidWindowObject =3;
meMissingLibrary =4;
meNoARexx =5;
meSingleTask =6;
(***************************************************************************
** Standard MUI Images
***************************************************************************)
CONST
miWindowBack = 0;
miRequesterBack = 1;
miButtonBack = 2;
miListBack = 3;
miTextBack = 4;
miPropBack = 5;
miPopupBack = 6;
miSelectedBack = 7;
miListCursor = 8;
miListSelect = 9;
miListSelCur = 10;
miArrowUp = 11;
miArrowDown = 12;
miArrowLeft = 13;
miArrowRight = 14;
miCheckMark = 15;
miRadioButton = 16;
miCycle = 17;
miPopUp = 18;
miPopFile = 19;
miPopDrawer = 20;
miPropKnob = 21;
miDrawer = 22;
miHardDisk = 23;
miDisk = 24;
miChip = 25;
miVolume = 26;
miPopUpBack = 27;
miNetwork = 28;
miAssign = 29;
miTapePlay = 30;
miTapePlayBack = 31;
miTapePause = 32;
miTapeStop = 33;
miTapeRecord = 34;
miGroupBack = 35;
miSliderBack = 36;
miSliderKnob = 37;
miTapeUp = 38;
miTapeDown = 39;
miCount = 40;
miBACKGROUND = (128+ 0);
miSHADOW = (128+ 1);
miSHINE = (128+ 2);
miFILL = (128+ 3);
miSHADOWBACK = (128+ 4);
miSHADOWFILL = (128+ 5);
miSHADOWSHINE= (128+ 6);
miFILLBACK = (128+ 7);
miFILLSHINE = (128+ 8);
miSHINEBACK = (128+ 9);
miFILLBACK2 = (128+10);
miHSHINEBACK = (128+11);
miHSHADOWBACK= (128+12);
miHSHINESHINE =(128+13);
miHSHADOWSHADOW=(128+14);
(*miN1HSHINE = (128+15); *)
miLASTPAT = (128+15);
(***************************************************************************
** Special values for some methods
***************************************************************************)
CONST
mvTriggerValue = 49893131H;
mvNotTriggerValue = 49893133H;
mvEveryTime = 49893131H;
mvApplicationSaveENV = 0;
mvApplicationSaveENVARC =-1;
mvApplicationLoadENV = 0;
mvApplicationLoadENVARC =-1;
mvApplicationReturnIDQuit = -1;
mvListInsertTop = 0;
mvListInsertActive = -1;
mvListInsertSorted = -2;
mvListInsertBottom = -3;
mvListRemoveFirst = 0;
mvListRemoveActive = -1;
mvListRemoveLast = -2;
mvListRemoveSelected = -3;
mvListSelectOff = 0;
mvListSelectOn = 1;
mvListSelectToggle = 2;
mvListSelectAsk = 3;
mvListMoveTop = 0;
mvListMoveActive = -1;
mvListMoveBottom = -2;
mvListMoveNext = -3; (* only valid for second parameter *)
mvListMovePrevious = -4; (* only valid for second parameter *)
mvListExchangeTop = 0;
mvListExchangeActive = -1;
mvListExchangeBottom = -2;
mvListExchangeNext = -3; (* only valid for second parameter *)
mvListExchangePrevious= -4; (* only valid for second parameter *)
mvListJumpTop = 0;
mvListJumpActive = -1;
mvListJumpBottom = -2;
mvListGetEntryActive = -1;
mvListSelectActive = -1;
mvListAll = -2;
mvListRedrawActive = -1;
mvListRedrawAll = -2;
mvColorpanelGetColorActive = -1;
mvColorpanelSetColorActive = -1;
(*******************************************)
(* Begin of automatic header file creation *)
(*******************************************)
(****************************************************************************)
(** Notify **)
(****************************************************************************)
CONST mcNotify = "Notify.mui";
(* Methods *)
CONST mmCallHook = 8042B96BH; (* V4 *)
CONST mmFindUData = 8042C196H; (* V8 *)
CONST mmGetUData = 8042ED0CH; (* V8 *)
CONST mmKillNotify = 8042D240H; (* V4 *)
CONST mmMultiSet = 8042D356H; (* V7 *)
CONST mmNoNotifySet = 8042216FH; (* V9 *)
CONST mmNotify = 8042C9CBH; (* V4 *)
CONST mmSet = 8042549AH; (* V4 *)
CONST mmSetAsString = 80422590H; (* V4 *)
CONST mmSetUData = 8042C920H; (* V8 *)
CONST mmWriteLong = 80428D86H; (* V6 *)
CONST mmWriteString = 80424BF4H; (* V6 *)
(* Attributes *)
CONST maAppMessage = 80421955H; (* V5 ..g struct AppMessage * *)
CONST maHelpFile = 80423A6EH; (* V4 isg STRPTR *)
CONST maHelpLine = 8042A825H; (* V4 isg LONG *)
CONST maHelpNode = 80420B85H; (* V4 isg STRPTR *)
CONST maNoNotify = 804237F9H; (* V7 .s. BOOL *)
CONST maRevision = 80427EAAH; (* V4 ..g LONG *)
CONST maUserData = 80420313H; (* V4 isg ULONG *)
CONST maVersion = 80422301H; (* V4 ..g LONG *)
(****************************************************************************)
(** Family **)
(****************************************************************************)
CONST mcFamily = "Family.mui";
(* Methods *)
CONST mmFamilyAddHead = 8042E200H; (* V8 *)
CONST mmFamilyAddTail = 8042D752H; (* V8 *)
CONST mmFamilyInsert = 80424D34H; (* V8 *)
CONST mmFamilyRemove = 8042F8A9H; (* V8 *)
CONST mmFamilySort = 80421C49H; (* V8 *)
CONST mmFamilyTransfer = 8042C14AH; (* V8 *)
(* Attributes *)
CONST maFamilyChild = 8042C696H; (* V8 i.. Object * *)
(****************************************************************************)
(** Menustrip **)
(****************************************************************************)
CONST mcMenustrip = "Menustrip.mui";
(* Methods *)
(* Attributes *)
CONST maMenustripEnabled = 8042815BH; (* V8 isg BOOL *)
(****************************************************************************)
(** Menu **)
(****************************************************************************)
CONST mcMenu = "Menu.mui";
(* Methods *)
(* Attributes *)
CONST maMenuEnabled = 8042ED48H; (* V8 isg BOOL *)
CONST maMenuTitle = 8042A0E3H; (* V8 isg STRPTR *)
(****************************************************************************)
(** Menuitem **)
(****************************************************************************)
CONST mcMenuitem = "Menuitem.mui";
(* Methods *)
(* Attributes *)
CONST maMenuitemChecked = 8042562AH; (* V8 isg BOOL *)
CONST maMenuitemCheckit = 80425ACEH; (* V8 isg BOOL *)
CONST maMenuitemEnabled = 8042AE0FH; (* V8 isg BOOL *)
CONST maMenuitemExclude = 80420BC6H; (* V8 isg LONG *)
CONST maMenuitemShortcut = 80422030H; (* V8 isg char *)
CONST maMenuitemTitle = 804218BEH; (* V8 isg STRPTR *)
CONST maMenuitemToggle = 80424D5CH; (* V8 isg BOOL *)
CONST maMenuitemTrigger = 80426F32H; (* V8 ..g struct MenuItem * *)
(****************************************************************************)
(** Application **)
(****************************************************************************)
CONST mcApplication = "Application.mui";
(* Methods *)
CONST mmApplicationGetMenuCheck = 8042C0A7H; (* V4 *)
CONST mmApplicationGetMenuState = 8042A58FH; (* V4 *)
CONST mmApplicationInput = 8042D0F5H; (* V4 *)
CONST mmApplicationInputBuffered = 80427E59H; (* V4 *)
CONST mmApplicationLoad = 8042F90DH; (* V4 *)
CONST mmApplicationPushMethod = 80429EF8H; (* V4 *)
CONST mmApplicationReturnID = 804276EFH; (* V4 *)
CONST mmApplicationSave = 804227EFH; (* V4 *)
CONST mmApplicationSetMenuCheck = 8042A707H; (* V4 *)
CONST mmApplicationSetMenuState = 80428BEFH; (* V4 *)
CONST mmApplicationShowHelp = 80426479H; (* V4 *)
(* Attributes *)
CONST maApplicationActive = 804260ABH; (* V4 isg BOOL *)
CONST maApplicationAuthor = 80424842H; (* V4 i.g STRPTR *)
CONST maApplicationBase = 8042E07AH; (* V4 i.g STRPTR *)
CONST maApplicationBroker = 8042DBCEH; (* V4 ..g Broker * *)
CONST maApplicationBrokerHook = 80428F4BH; (* V4 isg struct Hook * *)
CONST maApplicationBrokerPort = 8042E0ADH; (* V6 ..g struct MsgPort * *)
CONST maApplicationBrokerPri = 8042C8D0H; (* V6 i.g LONG *)
CONST maApplicationCommands = 80428648H; (* V4 isg struct MUI_Command * *)
CONST maApplicationCopyright = 8042EF4DH; (* V4 i.g STRPTR *)
CONST maApplicationDescription = 80421FC6H; (* V4 i.g STRPTR *)
CONST maApplicationDiskObject = 804235CBH; (* V4 isg struct DiskObject * *)
CONST maApplicationDoubleStart = 80423BC6H; (* V4 ..g BOOL *)
CONST maApplicationDropObject = 80421266H; (* V5 is. Object * *)
CONST maApplicationForceQuit = 804257DFH; (* V8 ..g BOOL *)
CONST maApplicationHelpFile = 804293F4H; (* V8 isg STRPTR *)
CONST maApplicationIconified = 8042A07FH; (* V4 .sg BOOL *)
CONST maApplicationMenu = 80420E1FH; (* V4 i.g struct NewMenu * *)
CONST maApplicationMenuAction = 80428961H; (* V4 ..g ULONG *)
CONST maApplicationMenuHelp = 8042540BH; (* V4 ..g ULONG *)
CONST maApplicationMenustrip = 804252D9H; (* V8 i.. Object * *)
CONST maApplicationRexxHook = 80427C42H; (* V7 isg struct Hook * *)
CONST maApplicationRexxMsg = 8042FD88H; (* V4 ..g struct RxMsg * *)
CONST maApplicationRexxString = 8042D711H; (* V4 .s. STRPTR *)
CONST maApplicationSingleTask = 8042A2C8H; (* V4 i.. BOOL *)
CONST maApplicationSleep = 80425711H; (* V4 .s. BOOL *)
CONST maApplicationTitle = 804281B8H; (* V4 i.g STRPTR *)
CONST maApplicationUseCommodities = 80425EE5H; (* V10 i.. BOOL *)
CONST maApplicationUseRexx = 80422387H; (* V10 i.. BOOL *)
CONST maApplicationVersion = 8042B33FH; (* V4 i.g STRPTR *)
CONST maApplicationWindow = 8042BFE0H; (* V4 i.. Object * *)
(****************************************************************************)
(** Window **)
(****************************************************************************)
CONST mcWindow = "Window.mui";
(* Methods *)
CONST mmWindowGetMenuCheck = 80420414H; (* V4 *)
CONST mmWindowGetMenuState = 80420D2FH; (* V4 *)
CONST mmWindowScreenToBack = 8042913DH; (* V4 *)
CONST mmWindowScreenToFront = 804227A4H; (* V4 *)
CONST mmWindowSetCycleChain = 80426510H; (* V4 *)
CONST mmWindowSetMenuCheck = 80422243H; (* V4 *)
CONST mmWindowSetMenuState = 80422B5EH; (* V4 *)
CONST mmWindowToBack = 8042152EH; (* V4 *)
CONST mmWindowToFront = 8042554FH; (* V4 *)
(* Attributes *)
CONST maWindowActivate = 80428D2FH; (* V4 isg BOOL *)
CONST maWindowActiveObject = 80427925H; (* V4 .sg Object * *)
CONST maWindowAltHeight = 8042CCE3H; (* V4 i.g LONG *)
CONST maWindowAltLeftEdge = 80422D65H; (* V4 i.g LONG *)
CONST maWindowAltTopEdge = 8042E99BH; (* V4 i.g LONG *)
CONST maWindowAltWidth = 804260F4H; (* V4 i.g LONG *)
CONST maWindowAppWindow = 804280CFH; (* V5 i.. BOOL *)
CONST maWindowBackdrop = 8042C0BBH; (* V4 i.. BOOL *)
CONST maWindowBorderless = 80429B79H; (* V4 i.. BOOL *)
CONST maWindowCloseGadget = 8042A110H; (* V4 i.. BOOL *)
CONST maWindowCloseRequest = 8042E86EH; (* V4 ..g BOOL *)
CONST maWindowDefaultObject = 804294D7H; (* V4 isg Object * *)
CONST maWindowDepthGadget = 80421923H; (* V4 i.. BOOL *)
CONST maWindowDragBar = 8042045DH; (* V4 i.. BOOL *)
CONST maWindowFancyDrawing = 8042BD0EH; (* V8 isg BOOL *)
CONST maWindowHeight = 80425846H; (* V4 i.g LONG *)
CONST maWindowID = 804201BDH; (* V4 isg ULONG *)
CONST maWindowInputEvent = 804247D8H; (* V4 ..g struct InputEvent * *)
CONST maWindowLeftEdge = 80426C65H; (* V4 i.g LONG *)
CONST maWindowMenu = 8042DB94H; (* V4 i.. struct NewMenu * *)
CONST maWindowMenuAction = 80427521H; (* V8 isg ULONG *)
CONST maWindowMenustrip = 8042855EH; (* V8 i.. Object * *)
CONST maWindowMouseObject = 8042BF9BH; (* V10 ..g Object * *)
CONST maWindowNeedsMouseObject = 8042372AH; (* V10 i.. BOOL *)
CONST maWindowNoMenus = 80429DF5H; (* V4 is. BOOL *)
CONST maWindowOpen = 80428AA0H; (* V4 .sg BOOL *)
CONST maWindowPublicScreen = 804278E4H; (* V6 isg STRPTR *)
CONST maWindowRefWindow = 804201F4H; (* V4 is. Object * *)
CONST maWindowRootObject = 8042CBA5H; (* V4 i.. Object * *)
CONST maWindowScreen = 8042DF4FH; (* V4 isg struct Screen * *)
CONST maWindowScreenTitle = 804234B0H; (* V5 isg STRPTR *)
CONST maWindowSizeGadget = 8042E33DH; (* V4 i.. BOOL *)
CONST maWindowSizeRight = 80424780H; (* V4 i.. BOOL *)
CONST maWindowSleep = 8042E7DBH; (* V4 .sg BOOL *)
CONST maWindowTitle = 8042AD3DH; (* V4 isg STRPTR *)
CONST maWindowTopEdge = 80427C66H; (* V4 i.g LONG *)
CONST maWindowWidth = 8042DCAEH; (* V4 i.g LONG *)
CONST maWindowWindow = 80426A42H; (* V4 ..g struct Window * *)
CONST mvWindowActiveObjectNone = 0;
CONST mvWindowActiveObjectNext = -1;
CONST mvWindowActiveObjectPrev = -2;
CONST mvWindowAltHeightScaled = -1000;
CONST mvWindowAltLeftEdgeCentered = -1;
CONST mvWindowAltLeftEdgeMoused = -2;
CONST mvWindowAltLeftEdgeNoChange = -1000;
CONST mvWindowAltTopEdgeCentered = -1;
CONST mvWindowAltTopEdgeMoused = -2;
CONST mvWindowAltTopEdgeNoChange = -1000;
CONST mvWindowAltWidthScaled = -1000;
CONST mvWindowHeightScaled = -1000;
CONST mvWindowHeightDefault = -1001;
CONST mvWindowLeftEdgeCentered = -1;
CONST mvWindowLeftEdgeMoused = -2;
CONST mvWindowMenuNoMenu = -1;
CONST mvWindowTopEdgeCentered = -1;
CONST mvWindowTopEdgeMoused = -2;
CONST mvWindowWidthScaled = -1000;
CONST mvWindowWidthDefault = -1001;
(****************************************************************************)
(** Area **)
(****************************************************************************)
CONST mcArea = "Area.mui";
(* Methods *)
CONST mmAskMinMax = 80423874H; (* V4 *)
CONST mmCleanup = 8042D985H; (* V4 *)
CONST mmDraw = 80426F3FH; (* V4 *)
CONST mmHandleInput = 80422A1AH; (* V4 *)
CONST mmHide = 8042F20FH; (* V4 *)
CONST mmSetup = 80428354H; (* V4 *)
CONST mmShow = 8042CC84H; (* V4 *)
(* Attributes *)
CONST maApplicationObject = 8042D3EEH; (* V4 ..g Object * *)
CONST maBackground = 8042545BH; (* V4 is. LONG *)
CONST maBottomEdge = 8042E552H; (* V4 ..g LONG *)
CONST maControlChar = 8042120BH; (* V4 i.. char *)
CONST maDisabled = 80423661H; (* V4 isg BOOL *)
CONST maExportID = 8042D76EH; (* V4 isg LONG *)
CONST maFixHeight = 8042A92BH; (* V4 i.. LONG *)
CONST maFixHeightTxt = 804276F2H; (* V4 i.. LONG *)
CONST maFixWidth = 8042A3F1H; (* V4 i.. LONG *)
CONST maFixWidthTxt = 8042D044H; (* V4 i.. STRPTR *)
CONST maFont = 8042BE50H; (* V4 i.g struct TextFont * *)
CONST maFrame = 8042AC64H; (* V4 i.. LONG *)
CONST maFramePhantomHoriz = 8042ED76H; (* V4 i.. BOOL *)
CONST maFrameTitle = 8042D1C7H; (* V4 i.. STRPTR *)
CONST maHeight = 80423237H; (* V4 ..g LONG *)
CONST maHorizWeight = 80426DB9H; (* V4 i.. WORD *)
CONST maInnerBottom = 8042F2C0H; (* V4 i.. LONG *)
CONST maInnerLeft = 804228F8H; (* V4 i.. LONG *)
CONST maInnerRight = 804297FFH; (* V4 i.. LONG *)
CONST maInnerTop = 80421EB6H; (* V4 i.. LONG *)
CONST maInputMode = 8042FB04H; (* V4 i.. LONG *)
CONST maLeftEdge = 8042BEC6H; (* V4 ..g LONG *)
CONST maPressed = 80423535H; (* V4 ..g BOOL *)
CONST maRightEdge = 8042BA82H; (* V4 ..g LONG *)
CONST maSelected = 8042654BH; (* V4 isg BOOL *)
CONST maShowMe = 80429BA8H; (* V4 isg BOOL *)
CONST maShowSelState = 8042CAACH; (* V4 i.. BOOL *)
CONST maTimer = 80426435H; (* V4 ..g LONG *)
CONST maTopEdge = 8042509BH; (* V4 ..g LONG *)
CONST maVertWeight = 804298D0H; (* V4 i.. WORD *)
CONST maWeight = 80421D1FH; (* V4 i.. WORD *)
CONST maWidth = 8042B59CH; (* V4 ..g LONG *)
CONST maWindow = 80421591H; (* V4 ..g struct Window * *)
CONST maWindowObject = 8042669EH; (* V4 ..g Object * *)
CONST mvFontInherit = 0;
CONST mvFontNormal = -1;
CONST mvFontList = -2;
CONST mvFontTiny = -3;
CONST mvFontFixed = -4;
CONST mvFontTitle = -5;
CONST mvFontBig = -6;
CONST mvFrameNone = 0;
CONST mvFrameButton = 1;
CONST mvFrameImageButton = 2;
CONST mvFrameText = 3;
CONST mvFrameString = 4;
CONST mvFrameReadList = 5;
CONST mvFrameInputList = 6;
CONST mvFrameProp = 7;
CONST mvFrameGauge = 8;
CONST mvFrameGroup = 9;
CONST mvFramePopUp = 10;
CONST mvFrameVirtual = 11;
CONST mvFrameSlider = 12;
CONST mvFrameCount = 13;
CONST mvInputModeNone = 0;
CONST mvInputModeRelVerify = 1;
CONST mvInputModeImmediate = 2;
CONST mvInputModeToggle = 3;
(****************************************************************************)
(** Rectangle **)
(****************************************************************************)
CONST mcRectangle = "Rectangle.mui";
(* Attributes *)
CONST maRectangleHBar = 8042C943H; (* V7 i.g BOOL *)
CONST maRectangleVBar = 80422204H; (* V7 i.g BOOL *)
(****************************************************************************)
(** Image **)
(****************************************************************************)
CONST mcImage = "Image.mui";
(* Attributes *)
CONST maImageFontMatch = 8042815DH; (* V4 i.. BOOL *)
CONST maImageFontMatchHeight = 80429F26H; (* V4 i.. BOOL *)
CONST maImageFontMatchWidth = 804239BFH; (* V4 i.. BOOL *)
CONST maImageFreeHoriz = 8042DA84H; (* V4 i.. BOOL *)
CONST maImageFreeVert = 8042EA28H; (* V4 i.. BOOL *)
CONST maImageOldImage = 80424F3DH; (* V4 i.. struct Image * *)
CONST maImageSpec = 804233D5H; (* V4 i.. char * *)
CONST maImageState = 8042A3ADH; (* V4 is. LONG *)
(****************************************************************************)
(** Bitmap **)
(****************************************************************************)
CONST mcBitmap = "Bitmap.mui";
(* Attributes *)
CONST maBitmapBitmap = 804279BDH; (* V8 isg struct BitMap * *)
CONST maBitmapHeight = 80421560H; (* V8 isg LONG *)
CONST maBitmapMappingTable = 8042E23DH; (* V8 isg UBYTE * *)
CONST maBitmapSourceColors = 80425360H; (* V8 isg ULONG * *)
CONST maBitmapTransparent = 80422805H; (* V8 isg LONG *)
CONST maBitmapWidth = 8042EB3AH; (* V8 isg LONG *)
(****************************************************************************)
(** Bodychunk **)
(****************************************************************************)
CONST mcBodychunk = "Bodychunk.mui";
(* Attributes *)
CONST maBodychunkBody = 8042CA67H; (* V8 isg UBYTE * *)
CONST maBodychunkCompression = 8042DE5FH; (* V8 isg UBYTE *)
CONST maBodychunkDepth = 8042C392H; (* V8 isg LONG *)
CONST maBodychunkMasking = 80423B0EH; (* V8 isg UBYTE *)
(****************************************************************************)
(** Text **)
(****************************************************************************)
CONST mcText = "Text.mui";
(* Attributes *)
CONST maTextContents = 8042F8DCH; (* V4 isg STRPTR *)
CONST maTextHiChar = 804218FFH; (* V4 i.. char *)
CONST maTextPreParse = 8042566DH; (* V4 isg STRPTR *)
CONST maTextSetMax = 80424D0AH; (* V4 i.. BOOL *)
CONST maTextSetMin = 80424E10H; (* V4 i.. BOOL *)
(****************************************************************************)
(** String **)
(****************************************************************************)
CONST mcString = "String.mui";
(* Attributes *)
CONST maStringAccept = 8042E3E1H; (* V4 isg STRPTR *)
CONST maStringAcknowledge = 8042026CH; (* V4 ..g STRPTR *)
CONST maStringAttachedList = 80420FD2H; (* V4 i.. Object * *)
CONST maStringBufferPos = 80428B6CH; (* V4 .sg LONG *)
CONST maStringContents = 80428FFDH; (* V4 isg STRPTR *)
CONST maStringDisplayPos = 8042CCBFH; (* V4 .sg LONG *)
CONST maStringEditHook = 80424C33H; (* V7 isg struct Hook * *)
CONST maStringFormat = 80427484H; (* V4 i.g LONG *)
CONST maStringInteger = 80426E8AH; (* V4 isg ULONG *)
CONST maStringMaxLen = 80424984H; (* V4 i.g LONG *)
CONST maStringReject = 8042179CH; (* V4 isg STRPTR *)
CONST maStringSecret = 80428769H; (* V4 i.g BOOL *)
CONST mvStringFormatLeft = 0;
CONST mvStringFormatCenter = 1;
CONST mvStringFormatRight = 2;
(****************************************************************************)
(** Prop **)
(****************************************************************************)
CONST mcProp = "Prop.mui";
(* Attributes *)
CONST maPropEntries = 8042FBDBH; (* V4 isg LONG *)
CONST maPropFirst = 8042D4B2H; (* V4 isg LONG *)
CONST maPropHoriz = 8042F4F3H; (* V4 i.g BOOL *)
CONST maPropSlider = 80429C3AH; (* V4 isg BOOL *)
CONST maPropVisible = 8042FEA6H; (* V4 isg LONG *)
(****************************************************************************)
(** Gauge **)
(****************************************************************************)
CONST mcGauge = "Gauge.mui";
(* Attributes *)
CONST maGaugeCurrent = 8042F0DDH; (* V4 isg LONG *)
CONST maGaugeDivide = 8042D8DFH; (* V4 isg BOOL *)
CONST maGaugeHoriz = 804232DDH; (* V4 i.. BOOL *)
CONST maGaugeInfoText = 8042BF15H; (* V7 isg char * *)
CONST maGaugeMax = 8042BCDBH; (* V4 isg LONG *)
(****************************************************************************)
(** Scale **)
(****************************************************************************)
CONST mcScale = "Scale.mui";
(* Attributes *)
CONST maScaleHoriz = 8042919AH; (* V4 isg BOOL *)
(****************************************************************************)
(** Boopsi **)
(****************************************************************************)
CONST mcBoopsi = "Boopsi.mui";
(* Attributes *)
CONST maBoopsiClass = 80426999H; (* V4 isg struct IClass * *)
CONST maBoopsiClassID = 8042BFA3H; (* V4 isg char * *)
CONST maBoopsiMaxHeight = 8042757FH; (* V4 isg ULONG *)
CONST maBoopsiMaxWidth = 8042BCB1H; (* V4 isg ULONG *)
CONST maBoopsiMinHeight = 80422C93H; (* V4 isg ULONG *)
CONST maBoopsiMinWidth = 80428FB2H; (* V4 isg ULONG *)
CONST maBoopsiObject = 80420178H; (* V4 ..g Object * *)
CONST maBoopsiRemember = 8042F4BDH; (* V4 i.. ULONG *)
CONST maBoopsiSmart = 8042B8D7H; (* V9 i.. BOOL *)
CONST maBoopsiTagDrawInfo = 8042BAE7H; (* V4 isg ULONG *)
CONST maBoopsiTagScreen = 8042BC71H; (* V4 isg ULONG *)
CONST maBoopsiTagWindow = 8042E11DH; (* V4 isg ULONG *)
(****************************************************************************)
(** Colorfield **)
(****************************************************************************)
CONST mcColorfield = "Colorfield.mui";
(* Attributes *)
CONST maColorfieldBlue = 8042D3B0H; (* V4 isg ULONG *)
CONST maColorfieldGreen = 80424466H; (* V4 isg ULONG *)
CONST maColorfieldPen = 8042713AH; (* V4 ..g ULONG *)
CONST maColorfieldRed = 804279F6H; (* V4 isg ULONG *)
CONST maColorfieldRGB = 8042677AH; (* V4 isg ULONG * *)
(****************************************************************************)
(** List **)
(****************************************************************************)
CONST mcList = "List.mui";
(* Methods *)
CONST mmListClear = 8042AD89H; (* V4 *)
CONST mmListExchange = 8042468CH; (* V4 *)
CONST mmListGetEntry = 804280ECH; (* V4 *)
CONST mmListInsert = 80426C87H; (* V4 *)
CONST mmListInsertSingle = 804254D5H; (* V7 *)
CONST mmListJump = 8042BAABH; (* V4 *)
CONST mmListMove = 804253C2H; (* V9 *)
CONST mmListNextSelected = 80425F17H; (* V6 *)
CONST mmListRedraw = 80427993H; (* V4 *)
CONST mmListRemove = 8042647EH; (* V4 *)
CONST mmListSelect = 804252D8H; (* V4 *)
CONST mmListSort = 80422275H; (* V4 *)
(* Attributes *)
CONST maListActive = 8042391CH; (* V4 isg LONG *)
CONST maListAdjustHeight = 8042850DH; (* V4 i.. BOOL *)
CONST maListAdjustWidth = 8042354AH; (* V4 i.. BOOL *)
CONST maListCompareHook = 80425C14H; (* V4 is. struct Hook * *)
CONST maListConstructHook = 8042894FH; (* V4 is. struct Hook * *)
CONST maListDestructHook = 804297CEH; (* V4 is. struct Hook * *)
CONST maListDisplayHook = 8042B4D5H; (* V4 is. struct Hook * *)
CONST maListEntries = 80421654H; (* V4 ..g LONG *)
CONST maListFirst = 804238D4H; (* V4 ..g LONG *)
CONST maListFormat = 80423C0AH; (* V4 isg STRPTR *)
CONST maListInsertPosition = 8042D0CDH; (* V9 ..g LONG *)
CONST maListMultiTestHook = 8042C2C6H; (* V4 is. struct Hook * *)
CONST maListQuiet = 8042D8C7H; (* V4 .s. BOOL *)
CONST maListSourceArray = 8042C0A0H; (* V4 i.. APTR *)
CONST maListTitle = 80423E66H; (* V6 isg char * *)
CONST maListVisible = 8042191FH; (* V4 ..g LONG *)
CONST mvListActiveOff = -1;
CONST mvListActiveTop = -2;
CONST mvListActiveBottom = -3;
CONST mvListActiveUp = -4;
CONST mvListActiveDown = -5;
CONST mvListActivePageUp = -6;
CONST mvListActivePageDown = -7;
CONST mvListConstructHookString = -1;
CONST mvListDestructHookString = -1;
(****************************************************************************)
(** Floattext **)
(****************************************************************************)
CONST mcFloattext = "Floattext.mui";
(* Attributes *)
CONST maFloattextJustify = 8042DC03H; (* V4 isg BOOL *)
CONST maFloattextSkipChars = 80425C7DH; (* V4 is. STRPTR *)
CONST maFloattextTabSize = 80427D17H; (* V4 is. LONG *)
CONST maFloattextText = 8042D16AH; (* V4 isg STRPTR *)
(****************************************************************************)
(** Volumelist **)
(****************************************************************************)
CONST mcVolumelist = "Volumelist.mui";
(****************************************************************************)
(** Scrmodelist **)
(****************************************************************************)
CONST mcScrmodelist = "Scrmodelist.mui";
(* Attributes *)
(****************************************************************************)
(** Dirlist **)
(****************************************************************************)
CONST mcDirlist = "Dirlist.mui";
(* Methods *)
CONST mmDirlistReRead = 80422D71H; (* V4 *)
(* Attributes *)
CONST maDirlistAcceptPattern = 8042760AH; (* V4 is. STRPTR *)
CONST maDirlistDirectory = 8042EA41H; (* V4 isg STRPTR *)
CONST maDirlistDrawersOnly = 8042B379H; (* V4 is. BOOL *)
CONST maDirlistFilesOnly = 8042896AH; (* V4 is. BOOL *)
CONST maDirlistFilterDrawers = 80424AD2H; (* V4 is. BOOL *)
CONST maDirlistFilterHook = 8042AE19H; (* V4 is. struct Hook * *)
CONST maDirlistMultiSelDirs = 80428653H; (* V6 is. BOOL *)
CONST maDirlistNumBytes = 80429E26H; (* V4 ..g LONG *)
CONST maDirlistNumDrawers = 80429CB8H; (* V4 ..g LONG *)
CONST maDirlistNumFiles = 8042A6F0H; (* V4 ..g LONG *)
CONST maDirlistPath = 80426176H; (* V4 ..g STRPTR *)
CONST maDirlistRejectIcons = 80424808H; (* V4 is. BOOL *)
CONST maDirlistRejectPattern = 804259C7H; (* V4 is. STRPTR *)
CONST maDirlistSortDirs = 8042BBB9H; (* V4 is. LONG *)
CONST maDirlistSortHighLow = 80421896H; (* V4 is. BOOL *)
CONST maDirlistSortType = 804228BCH; (* V4 is. LONG *)
CONST maDirlistStatus = 804240DEH; (* V4 ..g LONG *)
CONST mvDirlistSortDirsFirst = 0;
CONST mvDirlistSortDirsLast = 1;
CONST mvDirlistSortDirsMix = 2;
CONST mvDirlistSortTypeName = 0;
CONST mvDirlistSortTypeDate = 1;
CONST mvDirlistSortTypeSize = 2;
CONST mvDirlistStatusInvalid = 0;
CONST mvDirlistStatusReading = 1;
CONST mvDirlistStatusValid = 2;
(****************************************************************************)
(** Group **)
(****************************************************************************)
CONST mcGroup = "Group.mui";
(* Methods *)
(* Attributes *)
CONST maGroupActivePage = 80424199H; (* V5 isg LONG *)
CONST maGroupChild = 804226E6H; (* V4 i.. Object * *)
CONST maGroupColumns = 8042F416H; (* V4 is. LONG *)
CONST maGroupHoriz = 8042536BH; (* V4 i.. BOOL *)
CONST maGroupHorizSpacing = 8042C651H; (* V4 is. LONG *)
CONST maGroupPageMode = 80421A5FH; (* V5 is. BOOL *)
CONST maGroupRows = 8042B68FH; (* V4 is. LONG *)
CONST maGroupSameHeight = 8042037EH; (* V4 i.. BOOL *)
CONST maGroupSameSize = 80420860H; (* V4 i.. BOOL *)
CONST maGroupSameWidth = 8042B3ECH; (* V4 i.. BOOL *)
CONST maGroupSpacing = 8042866DH; (* V4 is. LONG *)
CONST maGroupVertSpacing = 8042E1BFH; (* V4 is. LONG *)
CONST mvGroupActivePageFirst = 0;
CONST mvGroupActivePageLast = -1;
CONST mvGroupActivePagePrev = -2;
CONST mvGroupActivePageNext = -3;
(****************************************************************************)
(** Register **)
(****************************************************************************)
CONST mcRegister = "Register.mui";
(* Attributes *)
CONST maRegisterFrame = 8042349BH; (* V7 i.g BOOL *)
CONST maRegisterTitles = 804297ECH; (* V7 i.g STRPTR * *)
(****************************************************************************)
(** Virtgroup **)
(****************************************************************************)
CONST mcVirtgroup = "Virtgroup.mui";
(* Methods *)
(* Attributes *)
CONST maVirtgroupHeight = 80423038H; (* V6 ..g LONG *)
CONST maVirtgroupLeft = 80429371H; (* V6 isg LONG *)
CONST maVirtgroupTop = 80425200H; (* V6 isg LONG *)
CONST maVirtgroupWidth = 80427C49H; (* V6 ..g LONG *)
(****************************************************************************)
(** Scrollgroup **)
(****************************************************************************)
CONST mcScrollgroup = "Scrollgroup.mui";
(* Attributes *)
CONST maScrollgroupContents = 80421261H; (* V4 i.. Object * *)
CONST maScrollgroupFreeHoriz = 804292F3H; (* V9 i.. BOOL *)
CONST maScrollgroupFreeVert = 804224F2H; (* V9 i.. BOOL *)
(****************************************************************************)
(** Scrollbar **)
(****************************************************************************)
CONST mcScrollbar = "Scrollbar.mui";
(****************************************************************************)
(** Listview **)
(****************************************************************************)
CONST mcListview = "Listview.mui";
(* Attributes *)
CONST maListviewClickColumn = 8042D1B3H; (* V7 ..g LONG *)
CONST maListviewDefClickColumn = 8042B296H; (* V7 isg LONG *)
CONST maListviewDoubleClick = 80424635H; (* V4 i.g BOOL *)
CONST maListviewInput = 8042682DH; (* V4 i.. BOOL *)
CONST maListviewList = 8042BCCEH; (* V4 i.. Object * *)
CONST maListviewMultiSelect = 80427E08H; (* V7 i.. LONG *)
CONST maListviewScrollerPos = 8042B1B4H; (* V10 i.. BOOL *)
CONST maListviewSelectChange = 8042178FH; (* V4 ..g BOOL *)
CONST mvListviewMultiSelectNone = 0;
CONST mvListviewMultiSelectDefault = 1;
CONST mvListviewMultiSelectShifted = 2;
CONST mvListviewMultiSelectAlways = 3;
CONST mvListviewScrollerPosDefault = 0;
CONST mvListviewScrollerPosLeft = 1;
CONST mvListviewScrollerPosRight = 2;
(****************************************************************************)
(** Radio **)
(****************************************************************************)
CONST mcRadio = "Radio.mui";
(* Attributes *)
CONST maRadioActive = 80429B41H; (* V4 isg LONG *)
CONST maRadioEntries = 8042B6A1H; (* V4 i.. STRPTR * *)
(****************************************************************************)
(** Cycle **)
(****************************************************************************)
CONST mcCycle = "Cycle.mui";
(* Attributes *)
CONST maCycleActive = 80421788H; (* V4 isg LONG *)
CONST maCycleEntries = 80420629H; (* V4 i.. STRPTR * *)
CONST mvCycleActiveNext = -1;
CONST mvCycleActivePrev = -2;
(****************************************************************************)
(** Slider **)
(****************************************************************************)
CONST mcSlider = "Slider.mui";
(* Attributes *)
CONST maSliderLevel = 8042AE3AH; (* V4 isg LONG *)
CONST maSliderMax = 8042D78AH; (* V4 isg LONG *)
CONST maSliderMin = 8042E404H; (* V4 isg LONG *)
CONST maSliderQuiet = 80420B26H; (* V6 i.. BOOL *)
CONST maSliderReverse = 8042F2A0H; (* V4 isg BOOL *)
(****************************************************************************)
(** Coloradjust **)
(****************************************************************************)
CONST mcColoradjust = "Coloradjust.mui";
(* Attributes *)
CONST maColoradjustBlue = 8042B8A3H; (* V4 isg ULONG *)
CONST maColoradjustGreen = 804285ABH; (* V4 isg ULONG *)
CONST maColoradjustModeID = 8042EC59H; (* V4 isg ULONG *)
CONST maColoradjustRed = 80420EAAH; (* V4 isg ULONG *)
CONST maColoradjustRGB = 8042F899H; (* V4 isg ULONG * *)
(****************************************************************************)
(** Palette **)
(****************************************************************************)
CONST mcPalette = "Palette.mui";
(* Attributes *)
CONST maPaletteEntries = 8042A3D8H; (* V6 i.g struct MUI_Palette_Entry * *)
CONST maPaletteGroupable = 80423E67H; (* V6 isg BOOL *)
CONST maPaletteNames = 8042C3A2H; (* V6 isg char ** *)
(****************************************************************************)
(** Colorpanel **)
(****************************************************************************)
CONST mcColorpanel = "Colorpanel.mui";
(* Methods *)
(* Attributes *)
(****************************************************************************)
(** Popstring **)
(****************************************************************************)
CONST mcPopstring = "Popstring.mui";
(* Methods *)
CONST mmPopstringClose = 8042DC52H; (* V7 *)
CONST mmPopstringOpen = 804258BAH; (* V7 *)
(* Attributes *)
CONST maPopstringButton = 8042D0B9H; (* V7 i.g Object * *)
CONST maPopstringCloseHook = 804256BFH; (* V7 isg struct Hook * *)
CONST maPopstringOpenHook = 80429D00H; (* V7 isg struct Hook * *)
CONST maPopstringString = 804239EAH; (* V7 i.g Object * *)
CONST maPopstringToggle = 80422B7AH; (* V7 isg BOOL *)
(****************************************************************************)
(** Popobject **)
(****************************************************************************)
CONST mcPopobject = "Popobject.mui";
(* Attributes *)
CONST maPopobjectFollow = 80424CB5H; (* V7 isg BOOL *)
CONST maPopobjectLight = 8042A5A3H; (* V7 isg BOOL *)
CONST maPopobjectObject = 804293E3H; (* V7 i.g Object * *)
CONST maPopobjectObjStrHook = 8042DB44H; (* V7 isg struct Hook * *)
CONST maPopobjectStrObjHook = 8042FBE1H; (* V7 isg struct Hook * *)
CONST maPopobjectVolatile = 804252ECH; (* V7 isg BOOL *)
CONST maPopobjectWindowHook = 8042F194H; (* V9 isg struct Hook * *)
(****************************************************************************)
(** Poplist **)
(****************************************************************************)
CONST mcPoplist = "Poplist.mui";
(* Attributes *)
CONST maPoplistArray = 8042084CH; (* V8 i.. char ** *)
(****************************************************************************)
(** Popasl **)
(****************************************************************************)
CONST mcPopasl = "Popasl.mui";
(* Attributes *)
CONST maPopaslActive = 80421B37H; (* V7 ..g BOOL *)
CONST maPopaslStartHook = 8042B703H; (* V7 isg struct Hook * *)
CONST maPopaslStopHook = 8042D8D2H; (* V7 isg struct Hook * *)
CONST maPopaslType = 8042DF3DH; (* V7 i.g ULONG *)
(*****************************************)
(* End of automatic header file creation *)
(*****************************************)
(****************************************************************************)
(** The additional Procedures for window-class **)
(****************************************************************************)
PROCEDURE mvWindowTopEdgeDelta(p:LONGINT): LONGINT;
PROCEDURE mvWindowWidthMinMax(p:LONGINT): LONGINT;
PROCEDURE mvWindowWidthVisible(p:LONGINT): LONGINT;
PROCEDURE mvWindowWidthScreen(p:LONGINT): LONGINT;
PROCEDURE mvWindowHeightMinMax(p:LONGINT): LONGINT;
PROCEDURE mvWindowHeightVisible(p:LONGINT): LONGINT;
PROCEDURE mvWindowHeightScreen(p:LONGINT): LONGINT;
PROCEDURE mvWindowAltTopEdgeDelta(p:LONGINT): LONGINT;
PROCEDURE mvWindowAltWidthMinMax(p:LONGINT): LONGINT;
PROCEDURE mvWindowAltWidthVisible(p:LONGINT): LONGINT;
PROCEDURE mvWindowAltWidthScreen(p:LONGINT): LONGINT;
PROCEDURE mvWindowAltHeightMinMax(p:LONGINT): LONGINT;
PROCEDURE mvWindowAltHeightVisible(p:LONGINT): LONGINT;
PROCEDURE mvWindowAltHeightScreen(p:LONGINT): LONGINT;
END MuiD.
